home *** CD-ROM | disk | FTP | other *** search
/ Into That Dark Night / Into That Dark Night.iso / pc / YadVashem / stabIntro.dxr / Internal_39_movie script.ls < prev    next >
Encoding:
Text File  |  2001-06-12  |  713 b   |  34 lines
  1. on prepareMovie
  2.   initPresentation()
  3.   repeat with i = 50 to 54
  4.     set the visible of sprite i to 1
  5.   end repeat
  6.   repeat with i = 100 to 110
  7.     set the visible of sprite i to 0
  8.   end repeat
  9.   updateStage()
  10. end
  11.  
  12. on startMovie
  13.   global floatMenu, Zed
  14.   DmFadePackReg("64464")
  15.   DmFadePackReg("40733")
  16.   Zed()
  17. end
  18.  
  19. on Zed
  20.   updateStage()
  21.   set the windowType of window "Z" to 2
  22.   set the titleVisible of window "Z" to 0
  23.   set the rect of window "Z" to the drawRect of window "Z" + rect(the stageLeft + 619, the stageTop + 458, the stageLeft + 619, the stageTop + 458)
  24.   open(window "Z")
  25.   updateStage()
  26. end
  27.  
  28. on stopMovie
  29.   global floatMenu
  30.   if objectp(floatMenu) then
  31.     forget(window "floatMenu")
  32.   end if
  33. end
  34.